gseaplot自定义颜色

《听说你有RNAseq数据却不知道怎么跑GSEA》一文有小伙伴问封面的gseaplot能否换颜色，于是我就随手支持了，

library(DOSE) data(geneList) x <- gseDO(geneList) gseaplot(x, 1, title=x$Description[1])

上面是本来默认的情况，现在可以设置color, color.line和color.vline：

gseaplot(x, 1, color="#DAB546",        color.line='firebrick',        color.vline="steelblue",        title=x$Description[1])

clusterProfiler系列电梯